home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2007 December
/
PCWorld_2007-12_cd.bin
/
domacnost a kancelar
/
autoit
/
autoit-v3-setup.exe
/
Examples
/
Helpfile
/
_GUICtrlStatusBarSetSimple.au3
< prev
next >
Wrap
Text File
|
2007-09-08
|
2KB
|
53 lines
Opt("MustDeclareVars", 1)
#include <GUIConstants.au3>
#Include <GuiStatusBar.au3>
Local $gui, $StatusBar1, $msg, $button
Local $a_PartsRightEdge[3] = [100, 350, -1]
Local $a_PartsText[3] = ["New Text", "More Text", "Even More Text"]
;================================================================
; Example 1 - Using AutoIt Control
;================================================================
$gui = GUICreate("Status Bar Set Simple", 500, -1, -1, -1, $WS_SIZEBOX)
$button = GUICtrlCreateButton("Toggle", 10, 10, 90, 25)
$StatusBar1 = _GUICtrlStatusBarCreate($gui, $a_PartsRightEdge, $a_PartsText)
GUISetState(@SW_SHOW)
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_RESIZED
_GUICtrlStatusBarResize($StatusBar1)
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $button
If _GUICtrlStatusBarIsSimple($StatusBar1) Then
_GUICtrlStatusBarSetSimple($StatusBar1, False)
Else
_GUICtrlStatusBarSetSimple($StatusBar1)
_GUICtrlStatusBarSetText($StatusBar1, "simple mode", $SB_SIMPLEID)
_GUICtrlStatusBarResize($StatusBar1)
EndIf
EndSelect
WEnd
GUIDelete()
;================================================================
; Example 2 - External Control
;================================================================
Opt("WinTitleMatchMode", 4)
Local $h_win = WinGetHandle("classname=SciTEWindow")
Local $h_status = ControlGetHandle($h_win, "", "msctls_statusbar321")
If _GUICtrlStatusBarIsSimple($h_status) Then
_GUICtrlStatusBarSetSimple($h_status, False)
Else
_GUICtrlStatusBarSetSimple($h_status)
Sleep(5000)
_GUICtrlStatusBarSetSimple($h_status, False)
;~ _GUICtrlStatusBarSetText ($StatusBar1, "simple mode", $SB_SIMPLEID)
;~ _GUICtrlStatusBarResize ($StatusBar1)
EndIf